home *** CD-ROM | disk | FTP | other *** search
- object CamDM: TCamDM
- OldCreateOrder = True
- Left = 545
- Top = 199
- Height = 372
- Width = 190
- object CmSipTable: TTable
- BeforePost = CmSipTableBeforePost
- TableName = 'CAMSIP.DB'
- Left = 28
- Top = 4
- object CmSipTableSipNo: TIntegerField
- FieldName = 'SipNo'
- Required = True
- end
- object CmSipTableSipTar: TDateField
- FieldName = 'SipTar'
- Required = True
- end
- object CmSipTableTesTar: TDateField
- FieldName = 'TesTar'
- Required = True
- end
- object CmSipTableCarNo: TStringField
- FieldName = 'CarNo'
- Required = True
- Size = 10
- end
- object CmSipTableCarAd: TStringField
- FieldName = 'CarAd'
- Required = True
- Size = 40
- end
- object CmSipTableMusAd: TStringField
- FieldName = 'MusAd'
- Size = 30
- end
- object CmSipTableAdres: TStringField
- FieldName = 'Adres'
- Size = 50
- end
- object CmSipTableNot1: TStringField
- FieldName = 'Not1'
- Size = 50
- end
- object CmSipTableNot2: TStringField
- FieldName = 'Not2'
- Size = 50
- end
- object CmSipTableNot3: TStringField
- FieldName = 'Not3'
- Size = 50
- end
- object CmSipTableNot4: TStringField
- FieldName = 'Not4'
- Size = 50
- end
- object CmSipTableNot5: TStringField
- FieldName = 'Not5'
- Size = 50
- end
- object CmSipTableKDVy: TFloatField
- FieldName = 'KDVy'
- end
- object CmSipTableKDV: TFloatField
- FieldName = 'KDV'
- end
- object CmSipTableISKy: TFloatField
- FieldName = 'ISKy'
- end
- object CmSipTableISK: TFloatField
- FieldName = 'ISK'
- end
- object CmSipTableMalTop: TFloatField
- FieldName = 'MalTop'
- end
- object CmSipTableNakliye: TFloatField
- FieldName = 'Nakliye'
- end
- object CmSipTableUretimde: TBooleanField
- FieldName = 'Uretimde'
- end
- object CmSipTableirsaliyede: TBooleanField
- FieldName = 'irsaliyede'
- end
- object CmSipTableCariHareket: TBooleanField
- FieldName = 'CariHareket'
- end
- end
- object CmKalTable: TTable
- TableName = 'CAMKAL.DB'
- Left = 28
- Top = 56
- object CmKalTableSipNo: TIntegerField
- FieldName = 'SipNo'
- Required = True
- end
- object CmKalTableSira: TIntegerField
- FieldName = 'Sira'
- Required = True
- end
- object CmKalTablePoz: TStringField
- FieldName = 'Poz'
- Size = 12
- end
- object CmKalTableStokNo: TStringField
- FieldName = 'StokNo'
- end
- object CmKalTableStokAd: TStringField
- FieldName = 'StokAd'
- Size = 40
- end
- object CmKalTableGen: TIntegerField
- FieldName = 'Gen'
- end
- object CmKalTableYuk: TIntegerField
- FieldName = 'Yuk'
- end
- object CmKalTableAdet: TIntegerField
- FieldName = 'Adet'
- end
- object CmKalTableBrAlan: TFloatField
- FieldName = 'BrAlan'
- end
- object CmKalTableAltSnr: TFloatField
- FieldName = 'AltSnr'
- end
- object CmKalTableArtOrn: TFloatField
- FieldName = 'ArtOrn'
- end
- object CmKalTableOzellik: TStringField
- FieldName = 'Ozellik'
- Size = 1
- end
- object CmKalTableSab: TBooleanField
- FieldName = 'Sab'
- end
- end
- object CmSipSource: TDataSource
- DataSet = CmSipTable
- Left = 107
- Top = 8
- end
- object CmKalSource: TDataSource
- DataSet = CmKalTable
- Left = 107
- Top = 60
- end
- object CmOzFTable: TTable
- IndexFieldNames = 'SipNo'
- MasterFields = 'SipNo'
- MasterSource = CmSipSource
- TableName = 'CamOzFy.DB'
- Left = 28
- Top = 112
- object CmOzFTableSipNo: TStringField
- FieldName = 'SipNo'
- Required = True
- end
- object CmOzFTableSiraNo: TIntegerField
- FieldName = 'SiraNo'
- Required = True
- end
- object CmOzFTableStNo: TStringField
- FieldName = 'StNo'
- end
- object CmOzFTableSab: TStringField
- FieldName = 'Sab'
- Size = 1
- end
- object CmOzFTableAltta: TFloatField
- FieldName = 'Altta'
- end
- object CmOzFTableUstte: TFloatField
- FieldName = 'Ustte'
- end
- object CmOzFTableBrFy: TFloatField
- FieldName = 'BrFy'
- end
- object CmOzFTableToplam: TFloatField
- FieldName = 'Toplam'
- end
- end
- object CmTmKTable: TTable
- MasterFields = 'SipNo'
- MasterSource = CmTamSource
- TableName = 'CAMTMKAL.DB'
- Left = 28
- Top = 215
- object CmTmKTableSipNo: TIntegerField
- FieldName = 'SipNo'
- Required = True
- end
- object CmTmKTableSira: TIntegerField
- FieldName = 'Sira'
- Required = True
- end
- object CmTmKTablePoz: TStringField
- FieldName = 'Poz'
- Size = 12
- end
- object CmTmKTableStokNo: TStringField
- FieldName = 'StokNo'
- end
- object CmTmKTableStokAd: TStringField
- FieldName = 'StokAd'
- Size = 40
- end
- object CmTmKTableGen: TIntegerField
- FieldName = 'Gen'
- end
- object CmTmKTableYuk: TIntegerField
- FieldName = 'Yuk'
- end
- object CmTmKTableAdet: TIntegerField
- FieldName = 'Adet'
- end
- object CmTmKTableBrAlan: TFloatField
- FieldName = 'BrAlan'
- end
- object CmTmKTableAltSnr: TFloatField
- FieldName = 'AltSnr'
- end
- object CmTmKTableArtOrn: TFloatField
- FieldName = 'ArtOrn'
- end
- object CmTmKTableSab: TBooleanField
- FieldName = 'Sab'
- end
- end
- object CmTamSource: TDataSource
- DataSet = cmtamtable
- Left = 107
- Top = 171
- end
- object CmTmkSource: TDataSource
- DataSet = CmTmKTable
- Left = 107
- Top = 219
- end
- object CmTmOzfTable: TTable
- MasterFields = 'SipNo'
- MasterSource = CmTamSource
- TableName = 'CAMTMOFY.DB'
- Left = 28
- Top = 267
- object CmTmOzfTableSipNo: TStringField
- FieldName = 'SipNo'
- Required = True
- end
- object CmTmOzfTableSiraNo: TIntegerField
- FieldName = 'SiraNo'
- Required = True
- end
- object CmTmOzfTableStNo: TStringField
- FieldName = 'StNo'
- end
- object CmTmOzfTableAltta: TFloatField
- FieldName = 'Altta'
- end
- object CmTmOzfTableUstte: TFloatField
- FieldName = 'Ustte'
- end
- object CmTmOzfTableBrFy: TFloatField
- FieldName = 'BrFy'
- DisplayFormat = '##,##'
- end
- object CmTmOzfTableToplam: TFloatField
- FieldName = 'Toplam'
- DisplayFormat = '##,##'
- end
- end
- object CmTmOzfsource: TDataSource
- DataSet = CmTmOzfTable
- Left = 107
- Top = 268
- end
- object DataSource1: TDataSource
- Left = 107
- Top = 124
- end
- object cmtamtable: TTable
- OnCalcFields = CmTamTableCalcFields
- DatabaseName = 'c:\math\101999'
- TableName = 'CAMTMSIP.DB'
- Left = 28
- Top = 168
- object cmtamtableSipNo: TIntegerField
- FieldName = 'SipNo'
- end
- object cmtamtableSipTar: TDateField
- FieldName = 'SipTar'
- end
- object cmtamtableTesTar: TDateField
- FieldName = 'TesTar'
- end
- object cmtamtableSevktar: TDateField
- FieldName = 'Sevktar'
- end
- object cmtamtableCarNo: TStringField
- FieldName = 'CarNo'
- Size = 10
- end
- object cmtamtableCarAd: TStringField
- FieldName = 'CarAd'
- Size = 40
- end
- object cmtamtableMusAd: TStringField
- FieldName = 'MusAd'
- Size = 30
- end
- object cmtamtableAdres: TStringField
- FieldName = 'Adres'
- Size = 50
- end
- object cmtamtableNot1: TStringField
- FieldName = 'Not1'
- Size = 50
- end
- object cmtamtableNot2: TStringField
- FieldName = 'Not2'
- Size = 50
- end
- object cmtamtableNot3: TStringField
- FieldName = 'Not3'
- Size = 50
- end
- object cmtamtableNot4: TStringField
- FieldName = 'Not4'
- Size = 50
- end
- object cmtamtableNot5: TStringField
- FieldName = 'Not5'
- Size = 50
- end
- object cmtamtableKDVy: TFloatField
- FieldName = 'KDVy'
- end
- object cmtamtableKDV: TFloatField
- FieldName = 'KDV'
- DisplayFormat = '#,##0.00'
- end
- object cmtamtableISKy: TFloatField
- FieldName = 'ISKy'
- end
- object cmtamtableISK: TFloatField
- FieldName = 'ISK'
- DisplayFormat = '#,##0.00'
- end
- object cmtamtableMalTop: TFloatField
- FieldName = 'MalTop'
- DisplayFormat = '#,##0.00'
- end
- object cmtamtableNakliye: TFloatField
- FieldName = 'Nakliye'
- DisplayFormat = '#,##0.00'
- end
- object cmtamtableUretimde: TBooleanField
- FieldName = 'Uretimde'
- end
- object cmtamtableirsaliyede: TBooleanField
- FieldName = 'irsaliyede'
- end
- object cmtamtableCariHareket: TBooleanField
- FieldName = 'CariHareket'
- end
- object cmtamtableyekun: TFloatField
- FieldKind = fkCalculated
- FieldName = 'yekun'
- DisplayFormat = '#,##0.00'
- Calculated = True
- end
- end
- end
-